home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #3 / Amiga Plus CD - 1996 - No. 3.iso / pd / daten / everydayorganiser_v1.0 / install_eo < prev    next >
Text File  |  1996-01-29  |  4KB  |  209 lines
  1. ; *** $VER: Install_EO V1.00           ***
  2. ; *** Copyright ©1996 by Mathew Wilson ***
  3.  
  4. (complete 0)
  5.  
  6. ; *** Introduction ***
  7.  
  8. ; get source root dir
  9. (set path (pathonly @icon))
  10.  
  11. (welcome)
  12.  
  13. (message "\n"
  14.     "Everyday Organiser v1.0 ©1996 by Mathew Wilson\n\n"
  15.     "All the programs in this archive are\n"
  16.     "classified as FreeWare.\n\n"
  17.     "You *must* have at least MUI version 3.1 installed\n"
  18.     "to operate most of these programs!\n"
  19.     "---------------------------------------------------"
  20. )
  21.  
  22. ; ** Installation Preparation ***
  23.  
  24. (welcome)
  25.  
  26. (set destination
  27.    (askdir
  28.       (prompt "Where would you like the applications to be installed?\n(A new directory called EverydayOrganiser will be created there.)")
  29.       (help   "This is where the EO programs will be copied to.\n\n"@askdir-help)
  30.       (default "SYS:Utilities")
  31.    )
  32. )
  33.  
  34. (set root-dest destination)
  35. (set @default-dest destination)
  36.  
  37. (set destination (tackon destination "EverydayOrganiser"))
  38.  
  39. (set @default-dest destination)
  40.  
  41. (copylib
  42.    (source "libs/everyday.library")
  43.    (dest "LIBS:")
  44. )
  45.  
  46. (complete 10)
  47.  
  48. (copyfiles
  49.    (help @copyfiles-help)
  50.    (source "EverydayOrganiser/")
  51.    (dest destination)
  52.    (all)
  53.    (infos)
  54. )
  55.  
  56. (copyfiles
  57.    (source "EverydayOrganiser.info")
  58.    (dest root-dest)
  59. )
  60.  
  61. (complete 20)
  62.  
  63. (copyfiles
  64.    (help @copyfiles-help)
  65.    (source "rexx/")
  66.    (dest "REXX:")
  67.    (all)
  68. )
  69.  
  70. (complete 30)
  71.  
  72. (if
  73.    (> @user-level 1)
  74.    
  75.    (set choice (askbool
  76.       (help @askbool-help)
  77.       (prompt "Would you like Alarmist copied to your "
  78.             "SYS:WBStartup drawer?\n\nThis is recommended!")
  79.       (default 1))
  80.    )
  81.    
  82.    (set choice 1)
  83. )
  84.  
  85. (if
  86.     (= choice 1)
  87.     
  88.     (copyfiles
  89.       (source "EverydayOrganiser/")
  90.       (dest "SYS:WBStartup/")
  91.       (choices "Alarmist" "Alarmist.info" "Alarmist_World.data")
  92.       (files)
  93.    )
  94. )
  95.  
  96. (complete 40)
  97.  
  98. ; ** Copy the AmigaGuides to the Locale:help/english drawer **
  99.  
  100. (if
  101.    (> @user-level 1)
  102.  
  103.    (set choice (askbool
  104.       (help @askbool-help)
  105.       (prompt "Would you like the AmigaGuides for the main programs "
  106.               "copied to Locale:help?\n\nThis is recommended!")
  107.       (default 1))
  108.    )
  109.    
  110.    (set choice 1)
  111. )
  112.  
  113. (if
  114.    (= choice 1)
  115.  
  116.    (copyfiles
  117.       (source "EverydayOrganiser/")
  118.       (dest "Locale:help/english")
  119.       (pattern "#?.guide")
  120.       (files)
  121.    )
  122. )
  123.  
  124. (complete 50)
  125.  
  126. ; ** Copy some of the extra programs to different places **
  127.  
  128. (set choice
  129.    (askoptions
  130.       (prompt "The extra programs are in the Extras drawer\n"
  131.               "but they should be copied to their normal drawers\n\n"
  132.               "Please choose which of the following to copy.")
  133.       (choices "TimePrefs (destination SYS:Prefs)" "Talk      (destination C:)" "Sam       (destination C:)" "Coder     (destination C:)")
  134.       (help @askoptions-help)
  135.    )
  136. )
  137.  
  138. ; ** copy TimePrefs **
  139. (if
  140.    (<> 0 (BITAND choice 1))
  141.    (
  142.       (copyfiles
  143.          (source "EverydayOrganiser/Extras/TimePrefs")
  144.          (dest "sys:prefs")
  145.          (infos)
  146.       )
  147.       
  148.       (delete (tackon destination "Extras/TimePrefs"))
  149.       (delete (tackon destination "Extras/TimePrefs.info"))
  150.    )
  151. )
  152.  
  153. (complete 60)
  154.  
  155. ; ** copy Talk? **
  156. (if
  157.    (<> 0 (BITAND choice 2))
  158.    (
  159.       (copyfiles
  160.          (source "EverydayOrganiser/Extras/Talk")
  161.          (dest "C:")
  162.       )
  163.    )
  164. )
  165.  
  166. (complete 75)
  167.  
  168. ; ** Copy Talk defaults file to s: **
  169. (copyfiles
  170.     (source "EverydayOrganiser/Extras/Talk_Defaults")
  171.     (dest "s:")
  172. )
  173.  
  174.  
  175.  
  176. ; ** copy Sam? **
  177. (if
  178.    (<> 0 (BITAND choice 4))
  179.    (
  180.       (copyfiles
  181.          (source "EverydayOrganiser/Extras/Sam")
  182.          (dest "C:")
  183.       )
  184.    )
  185. )
  186.  
  187. (complete 85)
  188.  
  189. ; ** copy Coder? **
  190. (if
  191.    (<> 0 (BITAND choice 8))
  192.    (
  193.       (copyfiles
  194.          (source "EverydayOrganiser/Extras/Coder")
  195.          (dest "C:")
  196.       )
  197.    )
  198. )
  199.  
  200. (complete 100)
  201.  
  202. (transcript "\nEveryday Organiser installed to "destination"\n")
  203.  
  204. ; ** Let's annoy the user with the Intro doc :) **
  205. (set intro_doc (tackon path "Introduction.guide")) 
  206. (run "sys:utilities/multiview" intro_doc (safe))
  207.  
  208. (exit "I hope you find Everyday Organiser useful.\n")
  209.